min max [ Y , max $partialdiff sub X$ ( WORLDBATH432 bath ) ]

forrtl: severe (174): SIGSEGV, segmentation fault occurred Image PC Routine Line Source ingridd 080AF9E5 Unknown Unknown Unknown